ocr: a MOVE=HFormlzmouseEnter (nethod nouseEnter(uar eventinfo MouseEvent) if - eventinfo.1sPrefilter0) then 1 This code executes for each object on the form. eventinfo.getlarget(largetobject) if Targetobject.Class = "Field" or Targetobject.Class = "Record" then sethouseshape(ncurser) disableDefault else setHouseShape(Mousearrow) endif else 1 This code executes only for the forn. - endif endmetnod Edit Line: 1 Col: 1
